#pragma once

#include <iostream>
#include <string>
#include <cerrno>
#include <cstring>
#include <cstdlib>
#include <functional>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <unordered_map>
#include <arpa/inet.h>
#include <sys/wait.h>
#include <unistd.h>
#include <pthread.h>
#include "comm.hpp"
#include "log.hpp"
#include "nocopy.hpp"
#include "InetAddr.hpp"
#include "Threadpool.hpp"
// #include "task.hpp"

const static int default_backlog = 5; //TODO
using task_t = std::function<void()>;
using callback_t = std::function<void(int, InetAddr&)>; // 可能要调整

class TcpServer;

class ThreadData
{
public:
    ThreadData(int sock, TcpServer* ptr, struct sockaddr_in &peer)
    :_sockfd(sock), _sver_ptr(ptr), _addr(peer)
    {}

    int SockFd(){ return _sockfd;}
    
    TcpServer *GetServer() {return _sver_ptr;}

    InetAddr& GetInetAddr() {return _addr;}
    ~ThreadData()
    {
        close(_sockfd);
    }
private:
    int _sockfd;
    TcpServer* _sver_ptr;
    InetAddr _addr;
};

class TcpServer: public nocopy
{
public:
    TcpServer(uint16_t port):_port(port), _isrunning(false)
    {}

    void Init()
    {
        // 1. 创建socket, file fd, 本质是文件
        _listensock = socket(AF_INET, SOCK_STREAM, 0);
        if(_listensock < 0)
        {
            lg.LogMessage(Fatal, "Create socket error, errno code: %d, error string: %s", errno, strerror(errno));
            exit(Fatal);
        }
        lg.LogMessage(Debug, "create socket success, sockfd: %d, errno code: %d, error string: %s ", _listensock, errno, strerror(errno));

        //固定写法，解决一些少量的bind失败的问题
        int opt = 1;
        setsockopt(_listensock, SOL_SOCKET, SO_REUSEADDR | SO_REUSEPORT, &opt, sizeof (opt));
        // 2. 填充本地网络信息并bind
        struct sockaddr_in local;
        memset(&local, 0, sizeof(local));
        local.sin_family = AF_INET;
        local.sin_port = htons(_port);
        local.sin_addr.s_addr = htonl(INADDR_ANY);

        // 2.1 bind
        if(bind(_listensock, CONV(&local), sizeof(local)) != 0)
        {
            lg.LogMessage(Fatal, "Bind socket error, errno code:%d, error string: %s", errno, strerror(errno));
            exit(Bind_Err);
        }
        lg.LogMessage(Debug, "Bind success");

        // 3. 设置socket为监听状态， tcp特有的
        if(listen(_listensock, default_backlog) != 0)
        {
            lg.LogMessage(Fatal, "listen socket error, errno code:%d, error string: %s", errno, strerror(errno));
            exit(Listen_Err);
        }
        lg.LogMessage(Debug, "listen socket success, sockfd: %d", _listensock);

        ThreadNs::ThreadPool<task_t>::GetInstance()->Start();

        funcs.insert(std::make_pair("defaultService", std::bind(&TcpServer::DefaultService, this, std::placeholders::_1, std::placeholders::_2)));
    }
    // Tcp 连接全双工通信 
    // void Service(int sockfd)
    // {
    //     char buffer[1024];
    //     // 一直进行IO
    //     while(true)
    //     {
    //         ssize_t n = read(sockfd, buffer, sizeof (buffer) - 1);
    //         if(n > 0)
    //         {
    //             buffer[n] = 0;
    //             std::cout << "client say# " << buffer << std::endl;

    //             std::string echo_string = buffer;
    //             write(sockfd, echo_string.c_str(), echo_string.size());
    //         }
    //         else if(n == 0) //read如果返回值是0， 表示读到了文件结尾(对端关闭了连接！)
    //         {
    //             lg.LogMessage(Info, "client quit...\n");
    //             break;
    //         }
    //         else 
    //         {
    //             lg.LogMessage(Warning, "read socket error, errno code:%d, error string: %s\n", errno, strerror(errno));
    //             break;
    //         }
    //     }
    // }

    void Service(int sockfd, InetAddr addr)
    {
        char buffer[1024];

        // 一直进行IO
        while(true)
        {
            ssize_t n = read(sockfd, buffer, sizeof (buffer) - 1);
            if(n > 0)
            {
                buffer[n] = 0;
                std::cout << addr.PrintDebug()  << "#" << buffer << std::endl;

                std::string echo_string = buffer;
                write(sockfd, echo_string.c_str(), echo_string.size());
            }
            else if(n == 0) //read如果返回值是0， 表示读到了文件结尾(对端关闭了连接！)
            {
                lg.LogMessage(Info, "client quit...");
                break;
            }
            else 
            {
                lg.LogMessage(Warning, "read socket error, errno code:%d, error string: %s", errno, strerror(errno));
                break;
            }
        }
    }

    static void *HandlerRequest(void *args) //this
    {

        pthread_detach(pthread_self());
        ThreadData* td = static_cast<ThreadData*>(args);

        td->GetServer()->Service(td->SockFd(), td->GetInetAddr());

        delete td;
        return nullptr;
    }

    void Start()
    {
        _isrunning = true;
        signal(SIGCHLD, SIG_IGN); // 在linux环境中，如果对SIG_IGN进行忽略，子进程退出的时候， 自动释放自己的资源
        while(_isrunning)
        {
            //4. 获取连接
            struct sockaddr_in peer;
            socklen_t len = sizeof(peer);
            int sockfd = accept(_listensock, CONV(&peer), &len); 
            if(sockfd < 0)
            {
                lg.LogMessage(Warning, "accept socket error, errno code:%d, error string: %s", errno, strerror(errno));
                continue;
            }
            lg.LogMessage(Debug, "accept success, get a new sockfd: %d", sockfd);

            // // 5.提供服务 v1 ~ v4
            // // v1 ---
            // Service(sockfd);
            // close(sockfd);

            // // v2 多进程
            // pid_t rid = fork();
            // if(rid < 0)
            // {
            //     close(sockfd);
            //     continue;;
            // }
            // else if(rid == 0)
            // {
            //     //child
            //     close(_listensock);
            //     if(fork() > 0) exit(0);

            //     //孙子进程，孤儿进程，被系统领养，正常处理
            //     Service(sockfd);
            //     close(sockfd);
            //     exit(0);
            // }
            // else 
            // {
            //     close(sockfd);
            //     pid_t rid = waitpid(id, nullptr, 0);
            //     if(rid == id)
            //     {
            //         //do nothing
            //     }
            // }

            // v3 多进程 - 信号版

            // pid_t rid = fork();
            // if(rid < 0)
            // {
            //     close(sockfd);
            //     continue;;
            // }
            // else if(rid == 0)
            // {
            //     //child
            //     close(_listensock);
            //     Service(sockfd);
            //     close(sockfd);
            //     exit(0);
            // }
            // else 
            // {
            //     close(sockfd);
            //     //父进程不想等待呢
            // }

            // v3 进程池 - 先创建子进程，然后才获取的连接，子进程看不到新获取的文件fd 

            // v4 多线程
            // ThreadData *td = new ThreadData(sockfd, this, peer);
            // pthread_t tid;
            // pthread_create(&tid, nullptr, HandlerRequest, &td);
            // 主线程和新线程，不需要关闭所谓文件描述符，将线程设置为分离

            // v5 线程池 -- 不能让我们的服务器提供长服务
            InetAddr addr(peer);
            task_t task = std::bind(&TcpServer::Routine, this, sockfd, addr);
            ThreadNs::ThreadPool<task_t>::GetInstance()->Push(task);
        }
    }
    std::string Read(int sockfd)
    {
        char type[1024];
        ssize_t n = read(sockfd, type, sizeof (type) - 1);
        if(n > 0)
        {
            type[n] = 0;

        }
        else if(n == 0) //read如果返回值是0， 表示读到了文件结尾(对端关闭了连接！)
        {
            lg.LogMessage(Info, "client quit...");
        }
        else 
        {
            lg.LogMessage(Warning, "read socket error, errno code:%d, error string: %s", errno, strerror(errno));
        }
        return type;
    }

    void Routine(int sockfd, InetAddr addr)
    {
        funcs["defaultService"](sockfd, addr);
        std::string type = Read(sockfd);
        lg.LogMessage(Debug, "%s, select %s", addr.PrintDebug().c_str(), type.c_str());
        if(type == "ping")
            funcs[type](sockfd, addr);
        else if(type == "translate")
            funcs[type](sockfd, addr);
        else if(type == "transform")
            funcs[type](sockfd, addr);
        else 
        {
        }
        close(sockfd);
    }

    void DefaultService(int sockfd, InetAddr& addr)
    {
        (void)addr;
        std::string service_list = " |";
        for(auto func: funcs)
        {
            service_list += func.first;
            service_list += "|";
        }

        write(sockfd, service_list.c_str(), service_list.size());
    }

    void RegisterFunc(const std::string &name, callback_t func)
    {
        funcs[name] = func;
    }

    ~TcpServer()
    {

    }
private:
    uint16_t _port;
    int _listensock;
    bool _isrunning;

    //构建业务逻辑
    std::unordered_map<std::string, callback_t> funcs;
};